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Program Description 
Multiple Regression Floating Point System 



Section I - Function 

The purpose of this floating point Interpretive system Is to 
cause the LGP-50 to act as a floating point computer. Since the program 
was essentially written for use In a multiple regression routine ,^* it is 
not a complete interpretive system in the usual sense. The arithmetic 
and housekeeping operations (with the exception of the N order) have 
the same meaning as In fixed point operation. To assist the programmer 
In debugging his programs, automatic tracing of the problem-program 
is available upon depression of the transfer control switch. A modified 
tracing mode Is available by the change of one instruction. 

Section II - Number Format 

1. Floating Point Accumulator 

A number in the floating point accumulator occupies two words 
of memory. One word consists of 51 binary bits representing the sign and 
magnitude of the fraction. This is a fully normalized number with a bit 
always in the most significant part of the word if positive and no bit 
if negative. The fractional part of the number is located in 00li-2. The 
second word consists of the exponent carried at q = 29 with an excess of 
256 at 29 and is stored in location OOUl. Thus a number whose real 
exponent is 12 at 29 will be represented as (256 + 12) = 268 at 29 and 
a number whose real q = -k will be represented as (256 - h) = 252 at 29. 
The number zero is represented as zero fraction and zero exponent. 

2. Format in Memory 

A floating point number in memory consists of two words -- one 
word representing the fractional portion and a second word representing 
the exponent. As In the case of the floating point accumulator, the 
fraction is a fully normalized 50 bits in addition to the sign bit. The 
exponents consist of nine bits each stored with three exponents per word 
again using the excess 256 form. Since the program was originally written 
for matrix operations, the following method of storing fractions and the 
corresponding exponents was adopted: The memory was considered to be 
constructed of elements each containing one-half track of memory. Hence 
in each half track, 2k words are used to store fractions and 8 to store 
the exponents for these fractions. The following figure Indicates how 
this storage is arranged in memory. 

* POOL Propram F2-122 
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Sector Sector 

' ■ ' 'I ■ "'I ' ' ■' I ' ' ' ' 'I' ' ■ '■ ' ' I ■ ■ ■> 
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-^ Li I i| ■ iif. I I |i i ■ t I nil I il n . ! ■ ■ ■' 

1.1 M I I I I I I I I I I ' I I I I I I I I I I I I I I I I it 
fl I I I I I I I I I I 1 M I I I I I I I I I I H I I I I ! I 

51 |i|*-^^z«-*h-^W5-*K4>^^y-H I 65 

M '' I ' t ''' I ''''■■ I '■'■■■'■■■ ' ■ ■ ■ ' 



The procedure for generating the address of the exponent from 
the address of the fraction is as follows: 

a. Save track bits and 52 bits of sector. Call this quantity 
T'. Call the five remaining bits of the sector portion of the address S'. 

b. Divide S' by 5, saving the integer portion, 1, and the 
remainder, P. 

e. Add T' + 2k to I. This gives the address of the exponent. 

d. Multiple P by 3. This tells which of the three exponents 
in the word is to be used. 

Precautionary Note : This program will operate correctly only with sector 
addresses of 00-25 and 52-55 • No check is provided for Illegal addresses . 
Care should be taken that Illegal addresses are not used, either by direct 
specification or address modification. 



Section III - Order Structure 

A total of 19 orders is available to the programmer. The 
tenn "accumulator" refers to the floating point accumulator described 
in Section II, Part 1. 
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A. Arithmetic Instructions 

1. B XXXX Bring 

The contents of XXXX replace the contents of the accumulator. 

2. H XXXX Hold 

Store the contents of the accumulator into XXXX. 

3. C XXXX Clear 

Store the contents of the accumulator into XXXX and set the 
accumulator to zero. 

1|-. A XXXX Add 

The contents of XXXX added to the contents of the accumulator 
replace the contents of the accumulator. 

5. S XXXX Subtract 

The contents of XXXX subtracted from the contents of the 
accumulator replace the contents of the accumulator. 

6. M XXXX Multiply 

The contents of XXXX multiplied by the contents of the accumu- 
lator replace the contents of the accumulator. 

7. D XXXX Divide 

The contents of the accumulator divided by the contents of XXXX 
replace the contents of the accumulator. 

8. R 0000 Square Root 

The square root of the contents (if non-negative) of the accumu- 
lator replace the contents of the accumulator. The address portion 
of the word has no meaning. Thus R 125^^ will still mean take the 
square root of the accumulator. 

9. Y 0000 Change Sign 

The contents of the accumulator multiplied by a minus one replace 
the contents of the accumulator. The address portion of the word 
has no meaning. 

B. Output Instructions 

10. P 0000 Print Accumulator 

Print the contents of the accumulator in floating point format. 
The ERP? output is used. A short format discussion is given below. 
If the reader needs further details, it Is recommended he consult 
the ERPP write-up. The contents of the accumulator are not disturbed. 
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Output will consist of a decimal point followed by 8 decimal 
digits of the fraction and the sign of the fraction. (The 
sign will be either "minus" or a "space"). Following this 
will be two spaces and a two-digit exponent to the base 10 
and its sign (only printed if "minus ''^ 



, «\ 



Examples of Output ; 

Printed Output 
.50600000 - Oil- 
. l23h'y6'jQ 05 
.50000000 07- 



Number in Power 
of Ten System 

-.506 X 10* 

.12345678 X 10^ 

.5 X 10"''' 



Numerical Value 
-5060.0000 
123.^+5678 
.00000005 



A convenient rule to convert numbers in floating point format to 
their numerical value is to move the decimal point to the right 
the number of places indicated by the exponent, if the sign of the 
exponent is positive and to the left, if the sign of the exponent 
is negative. 

11. P XXXX Print Character 

If XXXX Is non-zero, the print instruction indicated by XXXX will 
be executed. A delay is supplied by the interpretive routine. 

Transfer Orders 

12. T XXXX Test 

If the sign of the accumulator is negative, the next Interpreted 
instruction will be taken from XXXX; otherwise the interpretation 
continues In succession. 

15. U XXXX Unconditional Transfer 

The next instruction to be interpreted will be taken from XXXX. 
This order cannot be used to exit from the floating point system. 



Stop Orders 
Ih. Z 0000 



Stop 



Computation is halted unless Breakpoint h is depressed. The 
location of the Z 0000 order appears in the real accumulator 
at the time the machine stops. Depressing START will cause 
computation to resume at the next successive Instruction. The 
address portion of the instruction is ignored. 

15. N 0000 Stop 

The N order is interpreted in all respects similar to Z 0000. 
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E. Exit Orders 

16. E 0000 Exit Sequentially 

Exit from the floating point system. Control is returned to 
the next successive location. 

17. E XXXX Exit and Transfer 

Exit from the floating point system. Control is returned to 
XXXX. 

P. Input Orders 

18. I 0000 Input Sequentially 

The I 0000 order causes control to be transferred to 6-bit data 
input subroutine. The input routine will function sequentially 
until a proper exit order is encountered. The next successive 
instruction will be interpreted. The last data word is in the 
floating point accumulator. 

19. I XXXX Input Single Data Word 

The I XXXX order will cause the data input routine to read a 
single data word into XXXX. Control will be returned to the 
interpreter for interpretation of the next successive instruc- 
tion. The data word will be in the floating point accumulator. 

See Section VI for tape preparation and format details. 

Section IV - Address Modification 

This interpretive system does not contain any provision for 
address modification within the system. Hence in order to modify addresses, 
It is necessary to exit from the system and execute these in machine language. 
Although this is somewhat inconvenient, it should be pointed out that address 
modification in fixed point will run at considerably faster speeds than 
interpreted address modification orders. A further consideration was the 
desire to keep the program as short as possible. 

Section V - Function Evaluation 

This system contains no function evaluation orders with the 
exception of the square root order. 

Section VI - Data Input Routine 

The data input routine for this system Is a 6-blt data input 
routine coded as an Integral part of the interpretive system. The 6-blt 
button must be depressed during reading of data . 
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Function ; 

The function of this routine Is to input, convert, and store 
nine decimal digit numbers In the proper floating point form of this 
system. To allow for direct placing of the decimal point, the six-bit 
input mode is used. The routine is designed to read either groups of 
numbers into sequential locations (the I 0000 order) or to read a single 
data word into a specified location (the I XXXX order). 

Input: 

I 0000 - Input Sequentially 

Three types of words are used by this order. 

a. Initial address. 

b. First half of number or "group" and "exit- 
instructional words. 

c. Second half of number. 

a. The Initial address word is a 1^-dlgit decimal address at 
which sequential storage Is to begin. Sequential storing 
will continue until either an "EXIT" or "GROUP" word appears 
in the first half of the number. 

b. The first half of the word can contain the following: 

1. "EXIT" - The reading of the word "EXIT" will cause a 

carriage return to be executed and the routine to return 
to the next sequential Interpretive order following 
I 0000 order. 

11. "GROUP" - The reading of the word "GROUP" will cause the 
routine to read a new initial address word. 

ill. First half of number - The first half of a number can 
consist of five or less "acceptable" characters plus 
the minus sign if the number is negative. An "acceptable" 
character is defined as a decimal digit or the decimal 
point itself. If the number is positive, the positive 
sign must not be used . In the event that the number is 
negative, leading zeroes must be supplied. (See examples 
below. ) 

c. The second half of the word consists of five or less acceptable 
characters, as defined in paragraph 111. above. 

Data Tape Preparation for l 0000 Order : 

Any number containing nine decimal digits, plus the decimal point 
(and with a minus sign. If negative), is acceptable. These ten acceptable 
characters are read in two 5-character words. 
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Example: It Is desired to place the following numbers into the 
specified locations. 



Number 


0.0 


O.U55 


768.9761I56 


-O.oooJ+65712 


100.0 


100,000,000 


Location 


6200 


6201 


6202 


6205 


6220 


6100 



12.35 


-i^.O 


.000000001 


-60.00 


6101 


6102 


6105 


6250 



Address 


Word 


0. 


CO 


+ 


DATA 
First 


LOAD SHEET 
■ ■■ -u 


Word " 


Second Word 




a 


4-> 
CO 




6 


2 








t 














1 












' 
















• 


1 


i^j 5 


5 














' 
















7 


6 


! 

8 . 


9 




7 


6 


k 


5 


6 


t 














- 


, 





0* 





k 




6 


5 


7 


1 


2 


1 
















G 


R 





u 


p 


















6 


2 


2 





• 


















1 








• 


1 
















G 


R 





u 


p 


















6 


1 








t 




1 




























, 


I 




























1 


2 




3 


5 


t 














- 


1+ 


. 



















1 — 




• 
















, 




























1 


— 
















a 


R 





u 


p 


















6 


2 


5 





1 


- 


6 





. 




















1 


















E 


X 


I 


T 


--Jl 















(Read New Address) 



(Read New Address) 



(Read New Address) 



(End of Input) 



Note ; Words consisting of all zeroes need not be punched. A Stop Code is 
sufficient. The number zero can be input by using two Stop Codes. 
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I XXXX - Input Single Word 

This Input order will read one word into location XXXX. Under 
this mode no initial address is given to the routine. Hence normally 
one would only punch the decimal data in accordance with the instructions 
given for the I 0000 order, omitting the initial address, group, and exit 
words. Thus to read the same data as in the previous example, the program 
shown below with the corresponding data tape punching will suffice. 

Program Data Tape 



Enter P.P. 



J 



R (Lo ) 

U (Lo ) 
I 6200 

I 6201 .ii^55" 

I 6202 768.9 '761^56' 

I 6203 -.0001^*657 11 

I 6220 '100.' 

I 6100 10000 '0000. ' 

I 6101 '12.55' 

I 6102 -1^.000" 

I 6103 .0000 '00001' 

I 6250 -60.00" 



ll < 



Special Note on Use of I XXXX : One exception to this rule is allowed. 

If one has an I XXXX order and wishes to change the location of storage, 
the first word should be "group". This is followed by the address into 
which the data word should be read. This, in turn, is followed by the 
desired data word. Thus, suppose the I XXXX reads I 2006 and it is 
desired to store a data word into 21l4 instead. One would prepare tape 
as follows: group" 2114' XXX. X'XXXXX' It should be remembered that 
changing the data word location will not cause the input routine to 
enter the sequential mode of input. 

Accuracy : 

Integers are converted exactly. 

Fractional numbers will be in error by less than 1 in the 

29th bit regardless of relative position of decimal point. 

It is Immaterial to the accuracy of conversion as to the 
relative position of the decimal point. For example, the number I2.5I+ 
can be punched In any of the following ways, 
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12. 5^^" 
1'2.5^0' 



12.5 '^0000' 
' 12 . 5^^ ' 



12. '5^000' 



12'.5'+00' 



Similarly -12.3l|- can be punched as: 

-12.5i^" -012.3 'i^OOOO' -0012. '5^000' -00012 ». 5^000 ' 
-00001 '2. 5*^0' -00000 '12. 5^' 

Note that leading zeroes must be supplied for the negative situation. 

Time; Approximately 25 words/minute. 



Method of Conversion ; 

To guarantee maximum accuracy in conversion of the number, a 
normalizing operation is used. After blnarizatlon at q = 50 is completed, 
a normalizing loop is entered (provided N / O). Since N is a nine-digit 
number it must be < lO'*. The normalizing routine scales N such 8 x 10^ < 
N < lO'* , counting the number of multiplying shifts (by 10 at 51) required to 
do this. Call the number of left shifts R and the resulting shifted number 
N*. Having already determined P (O < P < ^), N* is scaled by two successive 
divide operations — one to account For P, the decimal point location and the 
other to account for the R shifts. By this method, therefore, a number such 
as 0.1 will be accurately converted regardless of the position of the "." and 
"1" within the two words. If the significant characters are all placed in 
the first word, the R loop will not require as many iterations; hence the 
routine will require less time than if the significant characters are all 
placed in the second word. All numbers are standardized prior to storage. 
The number zero is represented as zero fraction and zero exponent. 



Special Notes ; 

If the number consists of five or less characters {h digits plus 
decimal point), the routine will load faster if these are In entirely the 
first word. The reason for this Is discussed in the section on conversion 
method used. 

The input routine uses certain sections of the interpretive 
routine to perform the data storage operation. This causes the contents 
of the accumulator to be replaced by the data word being read in. In the 
case of any interpreted Input order, the floating point accumulator will 
contain the last data word read In. 
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Section VII - Tracing Mode 



tracing mode 
out upon dep 
print the ab 
instruction 
instruction) 
execution of 
printing the 
is executed. 



The floating point system of 12 tracks contains an automatic 

Tracing of all floating point Instructions will be carried 
ression of the transfer control switch. The tracing mode will 
solute location of the Instruction to be interpreted, the 
itself, the contents of the memory location, (if an arithmetic 
and the contents of the floating point accumulator after the 
all instructions with the exception of the exit orders. After 
contents of the floating point accumulator, a carriage return 



instruction. 



The following table illustrates the type of printing for each 



Type of 
Command 


Column A 
Location of 
Instruction 


Column B 
Instruction 


B XXXX 


YYYY 


B 


XXXX 


H XXXX 


rfYZ 


H 


XXXX 


C XXXX 


YYYY 


C 


XXXX 


A XXXX 


YYYY 


A 


XXXX 


S XXXX 


YYYY 


S 


XXXX 


M XXXX 


YYYY 


M 


XXXX 


D XXXX 


YYYY 


D 


XXXX 


R 0000 


YYYY 


R 


0000 


y 0000 


YYYY 


Y 


0000 


P 0000 


YYYY 


P 


0000 


P XXXX 


YYYY 


P 


XXXX 


T XXXX 


YYYY 


T 


XXXX 


U XXXX 


YYYY 


U 


XXXX 


Z 0000 


YYYY 


Z 


0000 


N 0000 


YYTf 


N 


0000 


E 0000 


YY'iY 


E 


0000 


E XXXX 


TIYY 


E 


XXXX 


I 0000 


YYYY 


T 


0000 



Column C 
Contents of Memory or 
P.P. Accumulator 
After Execution 

P.P. Accumulator 

P.P. Accumulator 

P.P. Accumulator 

Contents of XXXX 

Contents of XXXX 

Contents of XXXX 

Contents of XXXX 

Contents of P.P. Ace. 

Contents of P.P. Ace. 

Contents of P.P. Ace. 

Character and Contents 
of P.P. Accumulator 



Column D 
Contents of P.P. Ace, 
After Execution 



Contents of P.P. Ace. 

Contents of P.P. Ace. 

Contents of P.P. Ace. 

Contents of P.P. Ace. 



Contents of P.P. Ace, 



I XXXX 



YTYZ 



T XXXX 



Contents of P.P. Ace. 

Contents of P.P. Ace. 

Contents of P.P. Ace. 

Contents of P.p. Ace. 

(No Print or Carr. Ret. ) 

(No Print or Carr. Ret.) 

Upon recognition of the "EXIT" order, the 
contents of P.P. Ace. will be printed. This 
will be the last data word read in. 

Contents oi' P.p. Ace. (Data word read in) 
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Note: In the case of an E 0000 or E XXXX order, the trace routine does 
not~have the opportunity to execute a carriage return. Hence the next 
traced Instruction will appear on the same line as the previous exit 
order. 

The tracing mode (which occupies one track) can be dropped 
from the program by the following changes in the program. 



Location 



0007 



0016 



0521 
0522 



Present Contents 



80OTIO65 



80OTO718 



Rlkk-J 
UI3OO 



New Contents 



UOOO8 



ITOOOO 



R15^7 
U1200 



Notes 

Eliminate Printing of 
Location and Instruction 

Eliminate Printing of 
Floating Point Accumulator 
After Instruction Execution 

Calling Sequence for ERPP 
Printing Subroutine 



Loading Sequence 



Interpreter and Input 
ERPP Output 



Start Fill 
|000 (Lo) 
;000 (Lo + 1100) 



Set Modifier 
/OOO (Lo) 
/OOO (Lo + 1100) 



A further modification of the tracing mode can be made by dropping 
the last track of the interpreter and placing into location OOO7 the new command 
UOOO8. With the transfer control switch down the contents of the floating point 
accumulator will be printed after the interpretation of each instruction. 

Speed of Tracing 

All fixed point commands are executed at full machine speed. 
The time required for tracing is essentially that of printing the desired 
information. One can expect tracing to be executed at the rate of approxi- 
mately 6 seconds per traced instruction. 



Section VIII - Miscellaneous Information 



1. Loading Sequence with Trace 
Routine Start Pill 



Interpreter, Input & Trace 
ERPP Output (Prog. 12.5) 



^000 (Lo) 

^000 (Lo + 1200) 



Set Modifier 
/OOO (Lo) 
/OOO (Lo + 1200) 



Storage 
12 Tracks 
h Tracks 
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Loading Sequence without Trace 
Routine Start Pill 



Set Modifier 



Interpreter and Input 
ERF? Output (Prog. 12.5) 



;000 (Lo) /goo (Lo) 

;000 (Lo + 1100 ) /OOO (Lo + 1100 ) 



Storage 

11 Tracks 

k Tracks 



Note: See Section VII for program changes to allow omission of the tracing 
instructions. 



Storage 

12 Tracks with trace. 

11 Tracks without trace. 

Almost all Track 65 is used for temporary storage, 



5. Calling Sequence 

^ R (liO Interpreter) 
oC + 1 U (Lo Interpreter) 

oc + 2 r 
+ 5): 



'A 



o<- + 5 J Floating Point Instructions 



k. Program Stops 
Location Meaning 



Lo + 0261 
Lo + 0315 

Lo + 0556 



Lo + 031^5 



Lo + 0725 



Division by zero or 
unfloated number. 

N > 2^^ in Hold or 
Clear operation. 

Z or N order 
Breakpoint k 



N negative In Square 
Root Order 



Ten digits were read 
in by data input 
routine N > 2^° 



Corrective Action 
Do not continue . 

Do not continue . Pressing start will cause 
the floating point accumulator to be cleared, 
and the next Instruction Interpreted. 

Press "Start" to continue. 

The real accumulator contains the location of 
the Stop order. To find the order Itself, go 
into One Operation Mode. Press "Fill Instruc- 
tion" button and then "Execute Instruction". 
The Stop Instruction will then be displayed 
in the real accumulator. To continue, go back 
to "Normal" and press "Start". 

Pressing start to continue will cause the 
floating point accumulator to be cleared and 
the next instruction Interpreted. 

Do not continue. 
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Time of Execution : 

The times given in the table below are approximate and are 
somewhat on the conservative side. 



Order 



z 


0000 


B 


xxxx 


Y 


0000 


R 


0000 


I 


xxxx 


I 


0000 


D 


xxxx 


N 


0000 


M 


xxxx 


P 


xxxx 


E 


0000 


E 


xxxx 


U 


xxxx 


T 


xxxx 


H 


xxxx 


C 


xxxx 


A 


xxxx 


S 


xxxx 


P 


0000 



Time of Execution 
114-5 ms 
300 ms 
150 ms 
lj-50 ms 
2.2 sec 
25 words/min 
360 ms 
lij-5 ms 
560 ms 
250 ms * 
150 ms 
125 ms 
130 ms 
lit-0 ms 
300 ms 
510 ms 
500 ms ** 
500 ms ** 
'*'2.5 sec 



Notes :* Except tab and carriage return. 

** Somewhat less if either the memory location or accumulator 
contains zero. 

Coding sheets for this program are assembled as Division (2) 
of Program F2-122 
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LGP-30 CODING SHEET 
FLOATING POINT INTERPRETIVE SYSTEM 6 



Hl- 



121/ 



Division (2) 
Program F2-122 



PREPARED FOR: 

LaP-30 RPC-UOOO USERS ORGANIZATION - POOL 


PACE OF 

1 / 2h 


JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY: 

R.A. Koenig 


PROGRAM CHECKED BY: 

POOL Review 


$-7-S9 


PROBLEM: 

Floating Point Interpre 


ter (With Trace) 


00 


PROGRAM INPUT CODES 


Q. 

in 


LOCATION 


INSTRUCTION ^ 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS {j 




' 


/ 


















/ 


X 










ll 


0,0 , 




, , ,B| [, , ,] ' 


Instr. To 3e Inter. R & U to here 










|0 




1 ,X,H 6,3,3 |0 ' 


Instr. 












|0 




1 1 |Y| 0,1,1 ,7 ' 


Set up add 


in bring routine 










|0 




1 1 ,E, 0, 2,1 ,8 ' 


'X 


xsoooo 


Save order bits 










|0 




1 1 iM| 0| 0,2 ,6 ' 


i@ lU 


Shift to 29 










|0 




1 1 |A| 0, Ui5 ,5 ' 


Lo Transfer Table (UOU38) 










|0 




1 1 1^1 0| °|0 |9 ' 














!« 




§ q 0, T. 1, 0,6 ,3 ' 


:z 


->T.C. Down 


- Trace 










l" 




, ,X,B 6,3,3 ,0 ' 


Instr. 












lO 




[,,,,,,,]' 


U to transf 


er table 










|1 




, iX,C 1 6i3i2 i5 ' 


Dump Ace H 


ere N=0 on Std. 










|1 




1 1 |H| 0, O.i; ,2 


~x 


F.P. Ace 












|1 




1 1 iH 1 0, Oik a 


Exp Ace 












|1 




1 , |B| 0, 6,2 ,8 


' 1 @ 29 












,1 




1 1 1 ^ 1 0, , ° 1° 


' \ Modify 


Add for next 










|1 




1 1 iY| 0| 0,0 ,0 


'X 


J Instr. 












i1 




^ q O^T^ 0, 7,1 ,8 


r T.C. Down - 


Print F.P. Ace 




1 1 1 1 1 






|1 




, , ,U 0, 0,0 ,0 






,,0 


DO ^ 0^0 {; 


I 




|1 


8 


, 1 , , , 1 .2 


' 1 @ 30 


(1003: 










|1 


9 


1 ,, 1 ,8.0,0 


'X 


1 @ 20 


■\ 










|2 





, 1 1,0, 0| 0|0 ,0 


' 1 @ 11 


y Shift Right 










1 |2 




?, q 0,0 0, 0,0 ,0 


' 1 @ 2 


J Table for Exp. 










|2 




. . |R| q 1,3 i7 


' [store 


Here: Hold 










|2 




, , ,u, q 1,3 ,8 


'X 


J Subroutine 












|2 




, , ,U| q 0,1,3 


' — ^ To next con 


mand 


> p 


p Q 0,007 


' 




|2 




^ q 0| 0^ °, 0,0 ,0 


/ -1 e 


(0353 










i2 


6 


1 1 i 2 1 q 0,0 ,0 


' 1 e lii 


(ooou 










1 |2 


1 7 


$ q 0, 0, q 0,0 ,0 


lX 


-1@ 


(0062,0162) 










|2 


1 8 


^ q 0, C', 0,0 ,0 


, -i ^: 


(03U2 










|2 


|9 


, , ,^1 0| 0,0|^ 


• XIOOOl 


(O6II4: 










|3 





, , , 1 , , ,i^ 


' 1 i 29 4'. h 


@ 31 (lliU;: 










|3 


1 


6 C ' 

T 1 1 1 1 1 1 


■^ 


3 2 


(00U5 


FORM LF 


■"" SO 053 6 
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CARRIAGE RETl 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY PROGRAM CHtOKtU U»; 

R.A. Koenig POOL Review 


5/7/59 1^ 


PROBLEM: 

Ti"Tna.ting Point Interpreter (With Trace) 


00 


PROGRAM INPUT CODES 


0. 


1- 


- 

LOCATION 


INSTRUCTION 


0. 



h 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


i 


; 
















/ 


X 








_0,0,3 ,2 


1 1 |R 1 Oi 0|6 ^ 


/ 


' . Find Add 










|3 1 3 


, , ,U| 0,0,3 p 


/ 


- of exp. 










|3 1 4 


, , ^\ 0,i^,^ ,6 


/ 


(z0019) 


Lo shift right table 








,3 1 5 


, , J| 0,1,1^ 


/ 


E " 


M[ ] 


^ 








|3 1 6 


, , |U| 0,1,1^ 


/ 


-> Bring Fr aid Exp. 








,3 1 7 


^,\Z QJ,6l 


/ 
/ 


----- 


Mask 


(0115) 








|3 1 8 


E 10 3 

1 J _L i -L J J 


3w80 










|3 1 9 


^i_jJ^_,J^1l2X^ 


/ 


:>^ 


Track and 


32 bit of sector 








,4 , 


U ' U 3 


/ 












_1 


|4 1 1 


'■ 1 _L j_ 1 11 r 


/ 


Exponent A3C 








,4 1 2 


^ 1 L J 1 L L _il 


/ 


Fraction A 


3C. 








|1 ,3 


B 10 1 
1 1 _L 1 L 1 1 


/ 


X 


7J 


_ . J 








|4 1 4 


X xJ^J-^\^^^± 


/ 


Original Iistr. 








|4 1 5 


, , ,^ 0,0,3 1 


/ 


3 @ 2 










,4 1 6 


X H ' 6 3 3 2 

_L i 1 -1 i I L 


1 


Integer and Fr. @ 2? 








|4 1 7 


^_L iM|0,'5i2j6 


1 


X 


1 @ 2 










|4 , 8 


, 1 ,A,0,9,3,U 


1 


(XZ002U) 


• 








|4 1 9 


, , |U 0,0,5,3 


1 






, p p q ,0,0 3 


1 




i5 1 


3 W ¥ ¥ ¥ 

1 II 1 1 1 1 


1 
1 

1 


1 










|5 1 1 


7^ J,0 1,¥,¥,0 


E 




Mask Table 








|5 1 2 


7¥¥WQ000 
1 1 1 1 1 , , 


) 


for exponents 








1 |5 1 3 


, |X,A 6 3,2,5 


1 


Track and 


32 sector bit 








|5 1 4 


1 , |Y| 0,1,3,3 


1 


B[ ] for 


store 








|5 1 5 


. , ,Y, 0,1,1,3 


1 


X^ 


B[ ] for 


bring 








|5 1 6 


U' 5 7 
1 1 1 1 1 1 , 


1 












|5 1 7 


, , ,Y| 0,1,3,6 


1 


C[ ] 










|5 1 8 


B ii 1 6 

L -U -L 4- 1 i i 


1 
1 
1 
1 
1 
1 


3 e 29 










1 |5 1 9 


i ' :U 0^6 ,0 


X 






1 , 






|6 1 


: ^ X, E . 6 3 , 3 ^2 




Save indej 


bits at 29 fl 








1 |6 1 1 


- - ' - \ ' ■ " 


exit froin 


exp. add. generator 








1 |6 1 2 


, , , M 2 7 


-1 i 


(01U6)(0112) 








1 |6 1 3 


H 1| 2 

, , , 1 1 1 


X 






FOWM LP- 12 










J , \ L-... .| 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY: 

R.A. Koenig 


PROGRAM CHECKED BY: 

POOL Review 


DATE 

5-7-59 


PROBLEM: 

Floating Point Interpreter (With Trace) 


TRACK 

01 


PROGRAM INPUT CODES 


a. 

I 


LOCATION 


INSTRUCTION 


Q. 



(- 

0) 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 




1 
















1 


X 








Oil.O ,0 


, , iU|0,o;l } 




— * To next in: 


itr. 






1 |0 1 1 


, 1 Xi-Z| q 0,3,1 




Mask (001^3 


& Delay- 






1 |0 |2 


1 1 |U 0|0|1,3 




-^ To next Ins 


er. 






1 |0 |3 


1 1 XiZ 1 6i 3i3 e 














1 |0 1 4 


, 1 ,R|o,1,1,9 




Bring 


Here Bring 






1 |0 |5 


1 1 |U| 0, 0,3 ,2 




JSubr. 








1 |0 |( 


, . ,H|0,0,1;,2 




F.P. Ace 








1 |0 |7 


1 1 |U| OiliO ^ 




^ 










1 |0 l< 


1 1 X|E 0| 0,0 ^ 




Dummy 


(0229; 






1 |0 1 9 


. 1 XiB| 6,3i3 1 




Exp. From T 


smp. 






1 i1 |0 


1 , ,U|0,0,1,2 




-* Store Exp & 


Next Command 






, i» i' 


, , X,C 1 6, 3|6 p. 




/\DuiTip 


JHere N=0 






1 |1 |2 


1 1 iU| 0, 6,5 3 




To Bin Exit 


in 6-bit Bin. 






1 |1 1 3 


1 , |B| [, , , ] 




Exp. loc. 








1 i1 1 4 


, , |M| [, , , ] 




1 @ 2 . 1 @ 


LI or 1 @ 20 






1 |1 1 5 


, 1 ,E| 0,0,3 i7 




X 


7WJ , Save 


? bits @ 29 






1 |1 |6 


1 , X,H| 6,3,3 i 




Store Exp T 


emp. 






1 il (7 


, , ,Bj [, , , ] 




Fract. 








1 |1 1 8 


, |X,h| 6,3,3,3 




Fr. temp. 








1 |1 1 9 


, , |U| [i , , ] 




X 


Exit bring 


Dubr. 






1 |2 |0 


1 1 ,B, 0, 0,U,2 




F.P. Ace 


(0156) 






1 |2 1 1 


, , ,U| 0,1,2 k 












1 |2 1 2 


1 1 ^|2| 0,^,0 |0 




256 @ 29 


(0557) 






1 |2 1 3 


1 1 X|Z , 0, li|0 ^ 




X 


257 @ 29 


(0301) 






1 |2 1 4 


, , ,C| [, , , ] 




Store Fr. 








1 |2 1 5 


1 1 iS 1 Oi 3iO lii 




512 @ 29 








1 |2 1 6 


1 , iA| 0, 0,k A- 




Exp Ace 








1 |2 1 7 


1 , , T 1 0, 1 , 2 ,9 




X 


Exp < 512 


o.k. 






1 |2 1 8 


, , ,U 0,3,1^ 




Exp out of 


range > 256 






1 |2 1 9 


, , .A, 0, 7,ii ^ 




512 @ 29 








1 |3 1 


, , ^T| o,ii^5,n 




'^ Exp Neg - S 


tore as Zero 






1 |3 1 1 


, , .-:, [, , : ] 




X 


1 ;;. 29, 1 e 


20 or 1 @ 11 


FORM LP- 10 
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Al-121 


PROGRAM PREPARED BY: 

R.A. Koenig 


PROGRAM CHECKED BY: 

POOL Review 


DATE ^K^ 

5/7/59 W 


PROBLEM: 

Floating Point Interpreter (With Trace) 


TRACK 

01 


PROGRAM INPUT CODES 


0. 

in 


LOCATION 


INSTRUCTION 


0. 



h 
V) 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


I 


/ 
















/ 


X 








0|1|3 |2 


1 l^i^ 1 ^1^ P ? 




Exp shiftec 


for storage 








, . B [, , ,] 




Exp loc 










, , ,E|[, , ,] 




Mask out o] 


d exp 








1 1^1^ 1 ^1^ i*^ P 




K 


New exp 


^ 








, , ,c,[, , ,] 




Store exp 










1 i ,U| [, , , ] 


...... 




exit from £ 


tore subr. 








1 1 J 1 0|1,2 li 


Enter store 


subr. here 








1 1 |R 1 OiO|6 ^ 




y 


\ Add. 










, 1 |U 0,0,3 p 




3 Gen. for 


exp. 








, , ,A|0,5,6^ 




ZOi+21 Lo sY 


ift left table 








1 , ,u 0,1,5 ^ 


/ 












1 1 1^ 1 °i 2,2 ,2 


■ 


X 


Here: N neg 


in std. ^P 








, , ,U| 0,1,6,1 


' 












1 1 iS|0| 0,^,2 




F.P. Here 


: Change Sign Y 








1 1 1 U 1 0, , 6 ,2 




Coraplei, stc 


re back <Sc next comm. 








1 , X|B 6| 3,0 ,5 




'K 


Fs 


(0327) 






1 |4 1 8 


, , ,M| [, , , ] 


H 


Shift right 


1@ 1-1 ©30 W 






1 |4 1 9 


, , ,u 0,1,5 ,0 












1 |S 1 


, , X, A 6, 3 , ,1 




^"^ 








1 |5 1 1 


, 1 ,U 0, 9,2 ,3 




X 










1 |5 1 2 


, , J| 0,1,3,1 




N [ ] set 


up left shift to store 






1 |5 1 3 


1 ^ 1 °l ^ 1 ^ A 






exp 


1 1 1 1 1 1 1 




1 |5 1 4 


S 5 12 

1 1 1 1 1 1 1 




(XZ0335) C 


en index + 0050 


1 




1 l5 1 5 


, 1 J 1 °i ^ 1 ^ A 




^ 


Set up E [ 


] 






1 |5 1 6 


, , ,U 0, 1,2 ,0 




Complete st 


oring opn. 






1 |5 |7 


1 1 1 R 1 0, 2 , 2 ,2 




Here std. i 


OS. n 






1 |5 1 8 


1 1 1 U 0^ 2 , 2 ^0 


— 










1 |5 1 9 


^ U^ 0, 0^1 ^3 


X ^ 


To next 


instr. 






1 |6 1 


X z' i| 

1 i ; 1 1 1 1 




256 (§29 


(0210) ^ 






1 |6 1 1 


, , :S^ 0^2,14 


1 (^30 








1 |6 1 2 


, , ,M| 0,0^27 




-1 eo 


(Olii3) 






1 |6 1 3 


, , H, 0/V2 




X 


Complement 


Ace. 


FORM LP-12 




1 .., . . . . 

4 of 24 


>^ 
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lOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY: 

R.A. Koenig 


PROGRAM CHECKED BY: 

POOL Review 


5-7-^9 


PROBLEM: 

Floating Point Interpreter (With Tace) 


1 02 


PROGRAM INPUT CODES 


a. 

lA 


LOCATION 


INSTRUCTION J 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS f 


1 


/ 














/ 


)^ 








0| 


2iO lO 


1 1 |U| 0,2,2 p. ' 












lO |1 


, , ,R, 0,1,3,7 ' 


\ Store 


Here: Clear 








,0 ,2 


, , ,U| 0,1,3,8 ' 


J Subt, 










lO ,3 


1 . .u, 0,0,1 ;l ' 


_x 


-* Clear Ace 


's & rlext instr. 








,0 |4 


1 , 1^1 0|lil |9 ' 


'^ Bring 


Here: Multiply 








,0 |5 


1 1 ,U| 0, 0,3 ^ ' 


J Subr. 










,0 ,6 


, , ,M 0,0, li ,2 ' 


F.P. Ace 










iO |7 


, , ,H. 0,0,14,2 ' 


.X 


New Fr. 










iO |« 


1 1 iB. 0, 0,U P- ' 


Exp. Ace. 


•\ 








|0 |9 


, 1 X,A 6,3,3 rl ' 


E^ Temp 


\ Gen 








,1 ,0 


, , ,S| 0.1,6,0 - 


2^6® 29 


New Exp 








i« , 1 


11 .U| 0,2,1,2 ' 


lX 


1 










|1 |2 


, , ,h| 0, 0,i|,l 


' Exp. Ace 


/ 








|1 |3 


1 , iB, 0, 0,U,2 


F.P. ACC 


Here: Standardize 








|1 |4 


1 T , 0^ 9 , 2 8 


r N Neg 










|1 |5 


, , ,S| Q 0,3,0 


lX 


1 ©29 










i1 i6 


, , ,T q 0,1 ,0 


' -^ N=0 










|t |7 


, , ,u, qi,5.7 


' -> Here N Pc 


s 








,1 ,8 


, , X,S| Q 0,0,0 


' Mask 


(ooo; 








,1 |9 


, 1 ,H q o,ii,i 


lX 


Exp. Ace. 


"^ 










|2 |0 


, , ,B. q o,U,2 


' F.P. Ace 












1 i2 1 1 


, 1 ,N| Q 2,^,0 


' 1 @30 












|2 ,2 


, . ,T| [, , , ] 


' Exit fror 


Std. y Standardize 








|2 |3 


, , 1 C| Q 0,ii,2 


'^ 




Loop 








.2 i< 


, , ,U| q 2,2,5 


' J 












|2 i5 


, , iS| q 3,6,1 


' * 1 ©29 












|2 |6 


, , ,A| qo,u,i 


' Exp. Ace 


\ 








1 |2 ,7 


, , ,U| q 2,1,9 


lX 




J 








1 |2 i8 


, , ,Y| q 2,3,1 




Here: Exit 








1 |2 |9 


1 1 1 S| Q 1, 0,8 


' XEOOOl 










1 .3 |0 


, , ,T 1 q 3,2,8 


' XEOOGO 


Exit Sequentially 








1 |3 , 1 


1 , , u 1 [. i J 


'X 


Exit fror 


1 F.P. w/transfer 


FORM LP- 10 
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HOVAt H<*IC. JlSft4IX 



LGP-30 CODING SHEET 



PREPARED FOR: 

LGP-30 RPC-1;000 USERS ORGANIZATION - POOL 


PAGE OF 

6 / 21; 


JOB NO. 


PROGRAM NO. PROGRAM PREPARED BY; 

Al-121 R.A. Koenig 


PROGRAM CHECKED BY: 

POOL Review 


DATE ^Hk 

5/7/59 W 


PROBLEM: 

Floating Point Interpreter (With trace) 


TRACK 

02 


PROGRAM INPUT CODES 


L 


1;; 


LOCATION 


INSTRUCTION 




1- 

VI 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 




/ 
















/ 


X 








Q 2,3 |2 


1 , X,Z| 0, 0,6,3 




Mask 


(1126,1129) 






I i3 ,3 


, , ,R| 0,1,1 ? 




X Bring B ii 


ito Here Add 








|3 1 4 


, , ,u 0,0,3^ 




J temp 










i3 , 5 


, , |T'0,3,0^ 


' 


X 


OK to add 


% 








,3 1 6 


s' 2 5 1 

1 1 1 1 1 1 1 




1® 30 










|3 |7 


, , ,t| 0,0,1^ 




— *• No add or i 


lubtraet 








,3 ,8 


, , ,u| 0,3,0^ 




— > ok to add 




,000 ^ 0^0 2 


1 




|3 |9 


2 q 0,0, 0, 0,0 ,0 




X 


1® 2 . 


(0610) 








|4 ,0 


, ,2 

1 1 1 1 1 1 1 




1@ 30 


(0161) 








|4 , 1 


1 , 1^1 0l^l^l3 




30 @29 










l< |2 


1 1 1 T 1 0, 5 , ,2 




-*Fb = 2 










,4 1 3 


, , ,S 0,3,1^ 




X 


30 ©29 


% 








|4 1 4 


m' ii 2 




-1® 


Compliment diff . 








|4 1 5 


1 1 X|"| ^ 3,6,0 




mff in ex; 


)S. 








,4 , 6 


, , ,B, 0,0, U,2 




F.P. ace 










|4 1 7 


X H 6 3,0 ,5 

1 1 1 1 1 1 




X 


Fs 










i4 1 8 


^u^ 1 0^5 ,9 






• 


, ,0 p 9 ' 0, ,0 f 


1 




|4 1 9 


:j. i| 0^ 0^ 0| 0^0 




10 @ 6 


(11U8, iiUD 








i5 , 


, , , , . ,2 




1 @30 


(0221, 0607, 0921) 








|5 1 1 


, , , 1 , , ,2 




X 


1 @30 


(0236, 0215, Oii29, 0622) 








|5 1 2 


1 1 1 S! 9 0,0,14 




XPOOOl 


(0509) 








|5 1 3 


|; 9 0| 0| 0^0 




i @0 


(0517) 








|S 1 4 


1 1 |R| q i|i|9 




1 Bring subr 


Here: div. 








i5 1 5 


1 ^1 9 0,3,2 




X 


J 










|5 1 6 


^ B^ q o^U,2 




F.P. ace. 










i5 1 7 


^ M^ q U, 1,5 




10- 1 










|5 1 8 


1 1 1 U| 9 2, 6,1 














|5 1 9 


, 1 , Z| Q 5, 2,5 


X. " " 


Lo shift 


;able (0323) 








|6 1 


X Z 10 

1 1 1 1 1 ! 1 






U e 25 


(1152) % 








|6 , 1 


. , X D| 6 3, 3;3 


F _ _ 










|6 1 2 


, , , U| q 2,6,3 




g - - 










,6,3 


, , C 0,U 2 




Store Fr i 


I F.P. Ace 


FORM LP-12 










1 1 1 L—, ^ L_ . . 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY: PROGRAM CHLCKtD BY: 

R.A. Koenig POOL Review 


5-7-59 


PROBLEM: 

Floating Point Interpreter (With Trace) 


03 


PROGRAM INPUT CODES 




LOCATION 


INSTRUCTION 


a. 


h 
in 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION I ADDRESS 


1 


/ 
















/ 


X 








0| 


3 |0 1 


1 1 iBi q Oi^ii 




Exp. Ace 










|0 1 1 


, , ,^ Ql|2,3 




257 @ 29 










|0 1 2 


1 , X,S| ^ 3,3,1 




E^^ Temp 










,0 |3 


1 , . u, q 2,1,2 




X " 


To Std 










|0 |4 


1 . ^ 2 q 8, 0,0 




512 © 29 


(0125) 








|0 |5 


1 1 |B| q 0, Uii 




Exp Ace 


Start adding here 








|0 16 


1 1 1 U| Q 3i 0,9 








,,000 ,0,0 p 2 


1 




|0 |7 


1^ 0, 0,0 ' 0, 0,0 ,0 




y 












|0 |8 


. , , , , ,^ 














|0 1 9 


, , ^,s! ^^^^^ ,1 




% 












, , X|H| 61 3i6 ,0 




Diff in E 


xp. at 29 










, . ,Tj 0, 2,1;^. 




X 


Ev,> E. 












, 1 ,S| 0, U,6,2 




30 © 29 


Here Eh ^ Ea 










, , ,T| Q3,l ,8 




— *■ Continue 


kdd 










1 , iU. 0, 0,1 ,3 




-».E„ = J 


No Add needed 






j 




, , X|Z! 0, 0,3 ,0 




z 














1 1 |U| 0, 0,1 ,0 
















1,11111 
















, , X,B 6, 3,3 ,3 




5'b 


1 


. Store F^ As 










, X H^ 63, 0^5 




X 


Fs 


J 


Fs 










B U 2 
1 1 1 1 1 1 1 




F.P. Ace 










1 1 2 1 1 


M 3 7 




lei 












, , X,H, ^ 3, 0,1 




Ff (Shifted 


rt. 1) 










, , , B, q 2,5,9 




X 


Lo shif1 


table (ZO525) 










, 1 ^^1 ^ 3,6,0 




mff @ 29 












, 1 , u, q 3, 2,6 








,, ,| 1 1 1 1 






|2 1 6 


Y 1^8 
1 1 1 1 1 11 




M[ ] 










|2 1 7 


, , , u| 9 \^J 




X 


Complete j 


dd. 








|2 1 8 


1 1 1 B| 9 °i°i° 




Here 


(XEOOOO) 








|2 1 9 


, , ,A| 93,0,8 




1 (S 29 










|3 1 


, , ,Y, q 3,3,1 




set up exit 










|3 1 1 


, , ,u; u ,] 




yjfsit f.p. 




FOMM LP- 10 










7 of 24 




X 


CARRIAGE RETl 


JRN 







LGP-30 CODING SHEET 



'■''""'"~LGP-30 RPC-liOOO USERS ORGANIZATION - POOL 


PACE OF 

8 / 21; 


JOB NO. 


PROGRAM NO. 1 

Al-121 


PROGRAM PREPARED BY PHOOHAM CHtUKLU B» : 

R.A. Koenig ;'00L Review 


5/7/59 1^ 


Floating Point Interpreter (With Trace) 


03 


PROGRAM INPUT CODES 


a. 

lA 


LOCATION 


INSTRUCTION 




h 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 




; 
















/ 


X 








0| 


3 ,3 ,2 


1 1 1 1 1 1 1 


















, ,Xh' 6,3,0^ 




X. 

-I 












X H 6306 




h 












. , ,U 0,3,3,8 




E 




- -M\ 










1 , ^i^l 0|^iO P 




Z or N ordtr 










, , ,U|0,0,1,3 




To next in£ 


true t ion 










1 , X,C 6| 3,1,0 




X, 












, , ^,s ^1 3,0,^ 




^a 












1 1 X, D 6 3,0,5 




Xi 












, , X,A^ 3,0,6 




Xi 












1 1 ,M, 0, 0,2 ,8 


4@ 












T 3 5 9 

1 1 1 1 1 1 1 




X 






i> 










, , ,u qi;,2,i; 




Sq. Rt. Cor 


plete 












1 , X, z q , ,1 




i@ 29 SI 


op: VNsg* N°« 








1 1 1 

1 4 1 


, , ,U 0,10 




Clear ace. 


and continue 










R 119 

1 1 1 1 1 1 1 




E 


[Bring subr. 


Here: Subtract 








,4 1 8 


, , ,u q 0,3,2 




J 


• 








|4 1 9 


, , ,U| q 3,5,3 














,5 , 


1 1 1 1 1 1 1 














|S 1 1 


, , XB| ^ 3,3,0 




X 


(ouoo 










|5 1 2 


, 1 , U| q 0,1,5 














1 |5 1 3 


, , , M, q 0, 2,5 




-1@ 


Complement Fp 








|5 1 4 


, , x,H| ^3,3,3 




4 


in S 








|5 1 5 


, , ,U| q 2,3,5 




X 


-> To add 3« 


ction 








|5 , 6 


1 1 1 1 1 1 1 














|5 1 7 


1 1 1 1 1 1 1 














|5 1 8 


1 1 1 1 1 1 1 














1 |5 1 9 


, , ^A| ^3,1,0 




X " " 


X. 

-1 










1 |6 1 


, , , u, q 3,3,3 






"1 


, 1 0, 0,0 , 0,0,0 1 2 


1 




1 |6 1 t 


, , , 1 , , ,i^ 




1 @29 


(0225, 0925) 








1 |6 1 2 


7, W, ^ W W W, W|Q 


' 




(Oi;19) 








1 |6 1 3 


B li 2 

1 1 1 1 1 11 


1 ' 


yr-^ 




Here: Test 


FORM LP-U 
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X 


CARRIAGE RET 


JRN 





LGP-30 CODING SHEET 



PREPARCO FOR: 

LGP-30 RPC-UOOO USERS ORGANIZATION - POOL 


PAGE OF 

9 / 2li 


JOB NO. 


PROGRAM NO. 

Al-121 


>ROGRAM PREPARED BY: 

R.A. Koenig 


PROGRAM CHECKED BY: 

POOL Review 


5-7-59 


PROBLEM: 

Flopt.-inp- Pnint Interpreter (With Trace) 


oil 


PROGRAM INPUT CODES 


0. 
lA 


LOCATION 


INSTRUCTION ^ 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS [Jj 


' 


/ 














/ 


X 








lii .0 1 


, , ,T 1 0,3,5 ^ ' 


— » Acc Neg: Transfer 








|0 1 1 


1 , ,U 0,0,1 3 ' 


-^Acc Pos: Kext Instr. 


,, 0,0 ,0 0,0 p ,2 


1 




,0,2 


8,0 ,0 p 0, 0,0 ,0 ' 


-1 @ 


(02W;) 








,0 |3 


1; p ' 


z 


1 @ 1 


(0U17) 








,0 |4 


1 . ,B, 0,1;, 3, 3 ' 


1@ 29 










,0 |5 


1 . ,E, 0, 0,1;,1 / 


Exp Ace. 


Save odd bit 








,0 ,6 


. . iS| Q 6,2 ,8 ' 


1 @29 










,0 ,7 


1 . ,T 0, 5,6,0 / 


'X 


-^ Exp. E-ven 








|0 1 t 


, 1 ,u 0, U,3 ,)4 ' 


— ^ Exp. Ocd 








|0 ,9 


1 . ,A| 0, 3,U,5 ' 


1 @ 29 










|1 ,0 


. 1 1 A, 0, 0,1; ,1 ' 


Exp. Ace 










|1 |1 


U 5 1 6 ; 
1 1 1 1 1 1 1 


_x 












|1 |2 


1 1 1 ^ 1 ^ ° , ^ 1^ 


' Exp Aec 










|1 |3 


1 , |B, 0, 0,li,2 


P.P. Aec 










i1 1 4 


, , ,U, fi , , 1 


' Exit New 


Exp /^ 


, , 0, 0,0 , 0,0 ,0 |3 


I 




,1,5 


14,0 ,0 p I 0, 0,0 ,0 


lZ 


1 @ 1 


(0257) 








,1 ,6 


, , , 1 , , lj 


' 3 © 29 


(0058) 








|1 |7 


, , ,m' 0, U,0,3 


t 1@ 1 










,1 ,8 


, , X, c. 6, 3,0,U 


/ a 










|1 1 9 


^BO 3,6^2 


/ X 7WWWWWWQ 


1st guess 








,2 |0 


, , ,U| 0,3,3.3 






, , 0|0|0 1 0,0 ,0 ,3 


1 




1 |2 1 1 


, li o', 0,0,0 


, 1 f' 11 "1 


Shift left 








|2 |2 


, , , 1 ,8,0,0 


/ 1 f 20 


table (0125) 








|2 1 3 


, , , 1 , , ,u 


'X 


1 ^' 29 J 










1 i2 ,4 


1 , ^,B| ^ 3,1,0 


/ xi Here 


n/~" done 








|2 1 5 


, , ,^| 0, 0,^,2 


' P.P. Ace 










1 |2 1 6 


, , ,U, 0, 0,1 ,3 


' — > Next Commai 


d 








1 |2 1 7 


, , |S', M 0,ii ^2 


^X 


Here: Squ 


: re root 








1 |2 |8 


, , ,T| 0, 3,ii,5 


/ -^ a < 


stop and substitute 








1 a |9 


. . .^q^i.5.A._„ 


' 1 . 30 












1 |3 1 


J '^ 1 J 


' -^ a = 


to next command 








1 |3 , 1 


U ,0 1+ .ii 


ry- - 


a > 


continue 


FORM LP-IO 
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X 


CARRIAGE RET 


JRN 





LGP-30 CODING SHEET 



PHEPAHED FOR; 

LGP-30 RPC-UOOO USERS OROAIIIZATIOI-: - POOL 


PAGE OF 

10 / 2i; 


JOB NO. 


PROGRAM NO 

Al-121 


PROGRAM PREPARED BY HHOt.KAM CHLCKtU BY 

R.A. Koenig \ POOL Review 


5/7/59 W 


PROBLEM: 

Floating Point Interpreter (With Trace) 


OU 


PROGRAM INPUT CODES 


ft. 


h 
V) 


LOCATION 


INSTRUCTION 


0. 



h 


CONTENTS 
OF ADDRESS 


NOTES 

— -!-■■ -' .".-■' .■::=: 


OPERATION ADDRESS 


1 


/ 
















/ 


X 








_^U,3 |2 


1 1 1 1 1 1 1 


\ 












|3 |3 


, ,x,Z|0,o,n 


1 












|3 |4 


, ,^,c;6,36^ 


1 


\ Here Sq. Rt 


. Exp. odd 








,3 |5 


, , ,r; 0,^,1 


h 


1 


4 




^ 








|3 |6 


1 1 ,u o,U,op 


1 












|3 |7 


, , iu:o,u,i,7 


1 


J 










,3 ,S 


u' 8 ii U 

1 1 1 1 1 1 J 


1 


Z Transier table 








|3 i9 


U 1 
1 1 1 1 1 1 


h 
7 


1 
1 


^B 










|4 |0 


u 1 U 

1 1 1 1 1 1 


Y 










\* l1 


U li 2 
1 1 1 1 1 IJ 


1 


R 










|4 l2 


u' 5 1 3 

1 ) L 1 -i _L L- 


1 


I 










,4 ,3 


, , ,U|0,2,5/i 


1 


E 


D 


• 








(4 1 4 


, 1 ,U| 0,8, U^ 


1 


N 






1 




|4 1 5 


_J ± lU I 0i2,0ji 


1 


M 










,4 1 6 


U 5 8 

J_ _i J- -1 i _L -J 


1 


P 










,4 , 7 


U 2 2 8 

1 1 1 1 1 1 1 


1 


X 


E 










,4 |8 


1 1_ i -j. _J L.. _J^ 

1 1 ,U|0,o,i^ 


1 


u 


•_ 








|4 ,9 


1 , ,U| 0,3, 6;l 


1 


T 










,5 1 


U ' 2 2 

1 1 1 1 1 1 1 


1 
1 


H 










|5 1 1 


, , ,U 0,2,0 p. 


X 


C 










,5 ,2 


1 , ,U|0,2,3,3 


1 


A 










1 |5 1 3 


1 , .U 0,3,U,7 


1 


S 










|5 1 4 


1 1 X|Z 1 0, 0,0 k 


1 


ha 29 


(0U08) 










|5 1 5 


1 1 |U 0,U,3,8 


I 


^ 


Lo transfe 


' table 


(0005) 








i5 1 6 


, 1 |Z|0|0,1,9 


1 


Lo shift R 


:. table (003U)& Delay 








|5 1 7 


U 

1 1 1 1 1 1 1 


1 












|5 1 8 


, 1 X;C 6, 3,0- 


i9__ 
1 

h 

r. 
U 

'.J 


1 
1 
1 
1 
1 
1 


Durnp here 


ixp neg. in store 








1 |5 , 9 


1 1 ,c 0. U 


7 


Exp. ace 










1 |6 1 


1 , iC , 0. o,U 




P.P. ace 


store Of 
"(0312) 
(02U1) 


•. 








1 |6 1 1 


U 1 2 


Return of 
30; 29 


)en 








1 |6 1 2 


1 , X Z 3 










1 |6 1 3 


X Z ■ 3 


7 


30 29 




FORM LP-12 
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CARRIAGE RET 
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LGP-30 CODING SHEET 



PREPARED FOR: 

T,ap-^n Rpn-)iOOO users organization - pool 


PACE OF 

11 / 21| 


JOB NO. 


PROGRAM NO. 

Al-121 


»HOGHAM PREPARED BY PROGRAM CHtCKtU bV: 

R.A, Koenig i POOL Review 


5-7-59 


PROBLEM: 

Floating Point Interpreter (With Trace) 


05 


• ■ •'■•'■'^'■- ■■■■'-^ 

PROGRAM INPUT CODES 


0. 


1- 


LOCATION 


INSTRUCTION 


IL 



h 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION j ADDRESS 


.,,,,, 


/ 
















/ 


X 








0, 


5,0 1 


1, , , 1 , , ,1 




Here execute char, print. 








|0 1 1 


1 , ,u, 0| 1,0 |1 














|0 1 2 


1 1 ^1^' ^1 ^1^1^ 




Er 


Here F^=Z 








,0 1 3 


H U 1 


'X 


Exp Ace 










,0 |4 


X b' 6 3 3 3 
1 1 1 1 1 1 1 




^E 










|0 1 5 


1 , |U! 0, 5,0,6 














iO |6 


, 1 iH| q 0|li,2 




F.P. ace 










,0 |7 


, , ,u q 0,1,3 




X 


To next c 


ommand 








|0 |8 


h' 5 






Here on Print 








|0 ,9 


^S^ 2^5 ,2 




XPOOOl 












. . ,T| ^ °i5,3 




XPOOOO 












, . .u 0, 5,0 




X 


XPXXXX 


Execute Conunand 










, , ^1 z! q 3,3,5 




015U 












1 , |R| Cj 9,6,3 




"l Input 


Here Inout 










1 1 1 u, 6^1,14 




J Routine 












, , 1 u, q 0,1,3 




X 


Next Comn 


land 










, , ,s, q 5.ii,5 




256 @ 29 












, , ,M q 2,5,3 




i@ 












, , , A, q 9,6,1 




256 @ 29 












u U 1 2 
1 1 1 1 1 1 1 




X 














1 , ,b! q 0,1;, 2 




F.P. Ace 










1 1 2 1 1 


R 1 li U 7 
1 1 1 1 1 1 1 




\ E.R.F.P. P] 


'int 










1 1 , u 1 3 0,0 




. 












p q ](, z q 0, 0,0 




X 


Delay & -1 


@o (02Ul+,ii5i) 










, , ,u^ , J 




Exit on Pr 


.nt 


, , ,0 p 1 0, , 3 |0 


1 






1; q q q 0, o,o 




1 @ 1 


" 




1 1 1 1 1 1 1 








? Q 0, 0, q 0, 0,0 




1 @ 2 




(00U7) 


' '- ' j--'— -" 1- 








1000 0000 

1 1 1 1 1 1 1 




Kl 


1 @ 3 


Y v^hift table 








1 |2 1 8 


, § q q 0, 0^0 




1 © U 












1 |2 1 9 


II 

' 1 ! 1 1 1 1 




IG 5 












1 |3 1 


, 2 qo q - G^c 




1 .. 6 












1 |3 1 1 


ICC . ^ : - / 
1 1 1 1 1 1 ' i 


yr 


1 >■ 7 


--^ 




FORM LP- 10 
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y. 


CARRIAGE RETl 


JRN 




HOTAL M'XI. JMI4II 



LGP-30 CODING SHhtl 



PREPARED FOR: 

LGP-30 RPG-i|000 USERS ORGANIZATION - POOL 


PAGE OF 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY 

R.A. Koenig 


=>ROGRAM CHECKED BY: 

POOL Review 


DATE ^^ 

5-7.59 w 


PROBLEM: 

Floating Point Interpreter (With Trace) 


TRACK 
05 


PROGRAM INPUT CODES 


0. 

h 
VI 


LOCATION 


INSTRUCTION 


Q. 

h 
V) 


CONTENTS 
OF ADDRESS 


NOTES 

. — — ^ 


OPERATION ADDRESS 


1 


/ 
















' 


X 








^5,1 ,2 


1 1 8,0 1 0|0|0 p 




1 @ 8 












1 1^,0 0,0,0 p 




1 @ 9 












1 1 2,0 , 0,0,0 p 




1 ® 10 












1 1 1|0 1 0,0,0 p 




X 


1 @ 11 









J 




, , ,8 0,0,0 p 




1 @ 12 












^^i^K^L^^P 




— 


1 @ 13 












II 1 . ... 
1 1 |2 1 0|0|0 p 


1 @ 11; 












1 1 [1 1 0|0|0 P 




y 


1 @ 15 












111 3, 0,0 p 




1 @ 16 












1 1 1 |l+iO|Op 




1 @ 17 












2 

1 1 1 1 1 1 1 




1 @ 18 












' 1 

1 1 1 1 1 1 1 




E 


1 @ 19 


• 










8 




1 @ 20 












1 , 1 1 iU,op 




1 @ 21 


& 256 @ 29 (0516) 










1 1 1 1 , 2,0 p 




1 @ 22 








J^ 




1 1 1 1 |1|0 P 




7. 


1 @ 23 












8 

1 1 1 1 1 1 1 




1 @ 2ii 


• 










' h 

1 1 1 1 1 1 1 




1 ® 25 












2 




1 @ 26 












1 

1 1 1 1 1 1 1 




X 


1 @ 27 












1 1 .8 




1 @ 28 












' h 

1 1 1 1 1 1 1 




1 @ 29 


(1110) 










2 

1 1 1 1 1 1 1 




1 @ 30 


(0932) 












1 , |B 1 0| Oi^ i-*- 




7 


Exp. Ace 


Here: 


POOOO 








i5 1 6 


1 , ,U| 0, 5,5 J 














|5 1 7 


S 1 2 2 

1 1 1 1 1 1 1 




256 @ 29 










|5 1 8 


1 X|C , 6, 3,1 6 














' |5 1 9 


U 5.20 


-— 


X 


To print 


sub. 








|6 1 


1^ U 1 h 




X Here exp 


even V ^P 








|6 , 1 


, , ,U , I4.O ^ 


- 










,6 1 2 


^ i ' ^ U 1 8 ^ 










|6 1 3 


. , ,Z| 0,i^,2 1 


V, / 

A. 


Lo shift 1 


2ft table (OlUl) 


FORM LP- 12 
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CARRIAGE RETL 


RN 


HLXl MKl 1 Jl 1!l4l X 



LGP-30 CODING SHEET 



PREPARED FOR: 

LGP-30 RPC-UOOO USERS ORGANIZATION - POOL 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY 

R.A, Koenig 


PROGRAM CHECKED BY; 

POOL Review 


DATE 

5-7-59 


PROBLEM: 

Floating Point Interpreter (With Trace) 


TRACK 

06 


PROGRAM INPUT CODES 


0. 



H 

in 


LOCATION 


INSTRUCTION 


0. 

H 
l/l 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 


1 


/ 
















/ 


X 




,, 0,0 ,0 1 0,0 p ,ii 


1 


,6 |0 1 


, , , 1 ,7,0,0 




Mask 


(11142) 






1 |0 1 t 


, , , 1 ,9,J,^ 




10^ @33 


(0750) 






1 |0 |2 


, 1i2,J: S8,KF 


' 


"Exit" 


(0937) 






1 |0 |3 


, , ,8| 0,2,1,1, 




X 




(11U5,1153) 






1 |0 1 4 


, , X, C^ 3|li 7 




R dtr 








1 |0 |S 


X P 2 
1 1 1 1 1 1 1 




\ Read 2nd wi 


)rd 






1 |0 ,6 


X l' 2 1 
,11111, 




J 








1 |0 1 7 


, , ,N q2,5,o 




X 1 ©30 








1 |0 1* 


, 1 iR| Q 6,5,8 




- 


6-bit bin. 








1 |0 |9 


, , ,U| q 6,1,9 














1 |1 |0 


, . ,M| q ^ 3,9 




1© 2 


Shift to 30 






1 |1 1 ' 


, , ^H ^3,U,o 




>^ 


Store lowe] 


> half 






1 |1 |2 


, , , U| Q 7,2,2 




— > Assemble w< 


)rd 






1 |1 1 3 


1 , ^4 Z| qli 3,1 




287 @ 29 


(07l;l) 






1 i1 1 4 


1 1 , S 1 0, , 2 ,9 




XIOOOl 








1 |1 1 5 


, , ,T| 0, 9|U ^ 




X 


-► Seq. fi^ 


.1 






1 |1 |S 


, , ,R| 0,9,6,3 




I Single wor^ 


I fill 






1 l' 1 7 


, , , U , 0, 9 , U ,9 




- 








1 |1 1 8 


, , ,U| 0,9,6,3 




-♦ Exit 








1 |1 1 9 


, , X,H| 6| 3,0,5 




X 


N in 6 bit 








1 |2 |0 


, , ,S,0,7|6^ 




1 @ 30 








1 l2 1 I 


, , ,T . 0,1 ,1 ;l 




-^N = 








1 |2 |2 


, , ,A 1 0,2,5 ;l 




1 @ 30 








1 |2 1 3 


1 , ,E 1 0,6,5 ? 




X 


2082082 


Save 6th bits 






1 |2 1 4 


, , ,S 1 0,8,6 p 




1 @ 30 








1 |2 1 5 


, , ,T 1 0,6,3 ^ 




— > no "." in 1 


jord 






1 |2 1 6 


, , ,U 1 0,9,3 ? 




— > to dec. pt 


exit 


, , 0, 0,0 , 0, 0,0 , 5 


1 


1 |2 1 7 


, i;, 2,0 J,U,0 p 




X 


1 @ 5 + 2 


1 11 + 3 @ 17 + U ^ 2'3 ■ 






1 |2 1 8 


, , , 1 , , ^ 




1 @ 29 (0 


)13, 0l|06, 09U9^ 






1 |2 1 9 


1 1 3|W 5, 0,0 p 




Mask 


(061;3) 






, ,3 ,0 


7. J 1 1 ,C 




Mask 


(0651) 






1 |3 1 1 


. , , 1 . ,1/4 ' 


X '^ 


5 © 29 


(0719) 


FORM LP- 10 
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X 


carriage; retl 


RN 


i>o»*i. M««ic, JUI^lK ■ 



LGP-30 CODING SHEET 



PREPARED FOR: 

LaP-30 RPC-UOOO USERS ORGANIZATION - POOL 


1 




PAGE OF 

lli / 2]| 


JOB NO. 


PROGRAM NO PROGRAM PREPARED BY 

Al-121 R.A. Koenig 


ROGRAM CHECKED BY 

POOL Review 


DATE M^^ 

5/7/59 W 


PROBLEM: 

Floating Point Interpreter (With Trace) 


TRACK 

06 


PROGRAM INPUT COOES 


0. 


LOCATION 


INSTRUCTION 




t- 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 


^ 


/ 
















/ 


X 








0|6 ,3 , 2 


B 7 5 ii 

1 1 1 1 III 




79q79q8 










|3 , 3 


, X^E ^ 6, 3,0 ^ 




N 


in 6-bit 


Trim to BCD 








|3 1 4 


1 1 X|H| 6,3,0 ,6 




Nl 










|3 1 5 


1 1 |U| 0,6,3 p 




X 




•-- 


,1 0,0 ,0 0,0 p ,1 


1 




|3 1 6 


,1, 2, J Q, 8,K,8 




Exit - 1@ 


30 








|3 |7 


X B 6330 

1 1 1 1 III 




In 


str. to Tra;e 








|3 1 8 


1 1 |U, 0, 6,li,6 












|3 1 9 


1 1 ,E| Q 7,6,1 


y(\ IqOlqOO 










,4 , 


1 1 ,M| 0, 7,6,2 


-- 


-5U @6 










|4 , t 


, |X,A| 6,3,0,6 


. -----i- ^ 










,4 1 2 


, ,X,H| ^3,0,7 




k-."-^2 










,4 1 3 


, , ,E| 0,6,2,9 




X 


3w8000 


• 








|4 1 4 


, 1 ,M| 0, 9,1,6 




-3996 ©12 










|4 1 5 


, , |U| 0, 6,1,,9 




— 












i4 1 6 


_^ i 1^1 Ol^.^.O 


l| @ 8 . 


Form Print for Inatr. 








|4 1 7 


, , ,A| q 6,5,6 




X 


XPOIOO 










|4 1 8 


, , ,u, q 8,3,0 




) 


• 








,4 , 9 


, , ^A| 0,0,7 




N? 










,5 1 


, .X,H 6,3,0,8 




^ "^-- - 










|5 1 1 


, , ,E 0,6,3,0 




X 


7J000000 










|5 1 2 


, , ,M| 0,9,1,7 




-16,677,216 


@2U 








1 |5 1 3 


, , ,U 0,6,5,7 














|5 1 4 


1 , X, B I 6, 3 , 3 ,0 






Conimand to be Traced 








|5 1 5 


, , ,U| ^0,U,6 




X 


To Bri 


ig Fr. & Exp. 


,, 0,0,0 , 0^0 , 1,1 


> 




|5 1 6 


, , ,8| 0,1,0,0 




XPOIOO 


(06U7) 








|5 1 7 


, , ,A, 3, w,2,0 




XA63O8 Nc, 










|5 ,8 


, , x^' ■ '^ 




Exit 6-bit Bin 










|5 1 9 


, ^ 0, 8 2 0,8 ^2 


— 


7 ' " 


(Mask 


(0623) 








|6 1 


2000 0000 

1 t I j ■ 1 1 




1© 2 


(0610) IP 








,6 1 1 


W J 


Mask 


(0918) 








|6 1 2 


§ ^ 0, ,0 


-63/6U © 


(0919) 








,6 1 3 


2 

1 1 1 1 1 ! 




1 @ 6 


(0827) 


FORM LP- 11 










1 — 1 — 1 — , — ,,. 
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JOB NO. 


PROGRAM NO PROGRAM PREPARED BY: 

Al-121 R.A. Koenig 


PROGRAM CHECKED BT: 

POOL Review 


°"5/7/59 


PROBLEM: > 

Floating Point Interpreter (With Trace j 


07 


1 

PROGRAM INPUT CODES 


0. 



1- 


LOCATION 


INSTRUCTION g 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 5i 


1 


1 


=£SS 












/ 










0, 


7,0 ,0 


, , 1 1 6,1,F ^ ' 


10^ @33 


(0711i) 








|0 ,1 


1 9,1;,9 6 ,8,0 p ' 


8 X lo'''® 3 


) (0815) 








|0 |2 


1 1 1 1 1 1 1 












|0 ,3 


1 1 |E| 0,7,3^ ' 


X 


woowoo 










,0 ,4 


1 . ,M| 0,7,3^ ' 


-5U9 6 










,0 |S 


. .X,A| 6,3,2 ,7 ' 


"l 










,0 ,6 


1 . iU| 0. 9il .3 ' 












|0 1 7 


1 1 1 E 1 Oi 7 1 2 i9 ' 


E_ 


7WWWWWWQ 


Drop sign bit 










. 1 ,r| 0,6,5 ^ ' 


Set up bin jxit lat word 1 










1 1 lUJ 0,7.1,1 ' 














1 . iU| 0, 7iU i6 ' 














, 1 ,R| 0, 9,3 3 ' 


"E 


Set up "." 


.n 1st word 










1 , ,U| 0, 6,1 ,9 


-»'6 bit bin 












, ,X,H| 6,3,3,5 


De. Pt. Loc 


Here "." in Ist word 










1 , ,B| Q 7,0 ,0 


' 10^ @ 33 












, ,X,C| 6,3,3,7 


■Xh 












1 , ,B, 0,6,3,1 


r 5@ 29 












, , ,u| 0,7,5,2 














, 1 ,R, o,5,2,li 


1 


Print a'cc. on T.C. 

r . — — 








|1 1 9 


. 1 iu; 0,5,5,5 


'X 




depress 


id 








1 |2 1 


, 1 X, p. 1h 6,0,6 


^ 


c.r. 












, , ,U| 1,0.3,U 














1 , X,B| 6, 3,3,7 


/ Mt= IC^ or 


10^® 33 










, , ,u| q 7,2,U 


lX 














, , X,N| ^ 3,3,2 


1 1st word @ 


^8 


1 1 1 1 1 1 1 








, , X,A| ^3,1;,0 


; 2nd half @ 


50 










, , ,S| q 9,6,2 


' 1 @30 












, , ,T| q 9,U,l 


7X 


-» N = 












, , ,U| q 8,1,3 


' -»• To normaliz 


! 


,1 0,0,0 1 0,0 1 0,6 


. 






7 \f w, w , ■^ W, W ,Q 


' Mask 


(0707) 








1 |3 1 


, , , 1 , ,2,8 


' 10 @29 


(0908) 








1 |3 1 1 


2 8 
1 1 1 1 1 1 1 


'^ 


10 ©29 


(0902) 


rom»t i^-ia 
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joa NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY 

R.A. Koenig 


•ROGRAM CHECKED BY 

POOL Review 


DATE ^^ 

5/7/59 ^ 


PROBLEM: 

Floating Point Interpreter (With Trace) 


TRACK 

07 


PROGRAM INPUT CODES 


(L 


LOCATION 


INSTRUCTION 


n. 



CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


„._. ■ " 1 


1 
















/ 


X 








0|7,3 ,2 


¥ W 

1 1 1 1 1 1 1 




Mask 


(0703) 








9l400'0000 




-51; @6 


(070U) 








,,,,,> 














1 iXiB| ^3,5 p 




k 


N 9 30 


^ 








1 , |M, 0,9,1 ^ 




1® 1 










, , ,D| [, , J 




\ Scale BP 










, , ,D| [, , , ] 




QR 










1 1 |U| 0, 7,U ,0 




^ 










1 1 ^iC , 6, 3|2 |2 




N* 










1 1 |B 1 0, 6,1 3 




287 ® 29 










, , ,S| [, , ,] 




q for R shi 


fts _ 








1 1 |U| 0, 8,i^ ,6 




X 




• 








1 1 ^1 2 1 0, 8 , 




512 @ 29 


(0129) 








1 1 1 I 1 1 1 














1 , X|C 6, 3,3,2 




1st word @ 


28 








1 1 iR| Of 9,3,3 




X '' 


set " . " exi 


t for 2nd word 








1 1 1 U, Q 6,0 ,U 




Read 2nd wc 


rd • 








, , X, H 6, 3,3,5 




D.P.loc 










1 i , B 1 °, ^, ° |l 




10^ @ 33 








' ^- ■■ '■ '■-■ 


, 1 X, C| 6 3,3i7 




X 


R, _ _____ 








. 1 5 I 2 


1 1 X, C, ^ 3,1,0 




X 

Temp P Ctr. 








1 t 5 1 3 


, , ,U| q 7,5,5 








J, 0, 0,0 0,0,0 ;l 


1 




7 ^ Q, 7, 9, Q, 7,8 














, , ,B| q 6,2,7 




X "" 


1 @5 + 2@ 


11 + 3 ffl 17 + ii @ 23 








, , ^M| ^ 3,3,5 




Dec. Pt. Lc 


c 








, , ,E, q8,li,3 




XZ0007 


Save 3 bits @ 29 






1 |S 1 8 


, 1 ^ H| 6 3,U,i+ 




Dec. Pt. Ir 


dex 






1 |S 1 9 


1 1 ^ ^^ ^! ^i° 




X " 


Temp P ctr. 








1 !& 1 


, , , U| 8,0,0 


- -- 






"• 


, 0, o,o' 0^0 p ^ 


1 


1 |6 1 1 


1 Q, 0^ 1 Q 


Mask 


(0639) 






1 |6 1 2 


9 li 


-5U @ 6 


(061|0) 






1 i6 1 3 


2 




1 @ 30 


(0620) (0813) 


FORM LP-12 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY PROGRAM CHLCKLU BY : "Alt 

R.A. KoeniK POOL Review 5-7-^9 


PROBLEM: 

Floating Point Interpreter (With Trace) 


rRACK 

08 


PROGRAM INPUT CODES 


g. 

% 
in 


LOCATION 


INSTRUCTION 


0. 


(- 

V) 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 


1 

1 1 1 1 1 1 1 


1 














1 


/ 


X 




1 1 1 1 1 \ 1 




— ^ 
1 


8,0 1 


1 , XiC|6 3 ,U|3 






Store P Ctr. 








|0 1 1 


, , x,B 6 3 |U |li 




'' 


Dec. Pt. Index 








,0 |2 


1 1 1 A 3 1 2 ,U 




Z1037 










iO ,3 


1 . |Y.O |8 ,2 |5 




X 




Set up Mask for Remov- 








,0 1 4 


1 , |A|0 /^ i5,U 




U @29 


ing Dec. Pt. 








,0 |S 


. . ,Y,0 ^ ,3,U 














|0 ,6 


1 1 1 U ,0 ,8 , 2 ,5 




J 




, ,0 p ,0 , 0,0 ,0 ,3 


I 




|0 ,7 


1 1 1 1 1 1 1 




^ 












|0 |8 


|F 




10® 31 


(0822) 










. , , 1 , ,7,J 




Mask 


(0951) 










, , ,R 0, 8,5,3 




> 


Set up 


Here N Neg 










, , ,u. q 7,0,7 




X 




' Neg. Exi 


t 










1 . ,U, 1, 0,U,9 




-^> 


Compleme 


nt Fraction 










1 , |A| q 7,6,3 




1 @ 30 












1 1 X, H 6 3,5,0 




N @ 30 


> 












. , ,S| q 7iO|l 




E 


8 X lo"^ @ 


30 












1 1 1 T, q 8,1,8 




— *- N Not Noi 


malized 












, , ,u q 8,6,3 




— >. N Normal: 


zed 










,1,8 


, , X,B^ 3,i;,7 




R Ctr. 




► Normalize 








,1,9 


1 1 . A q 7, 3,U 




7a 


1 @ 29 




Loop 








,2 , 


, , X,H^ 3|ii,7 




R Ctr. 












1 |2 1 1 


, , X.B| ^ 3,5,0 




N 












|2 1 2 


1 1 1 N| q 8,0,8 




10 @31 












|2 1 3 


, , , u, q 8, 1,1; 




X 






— ~ • — - 








|2 1 4 


, , , Z| ^ 0,3,7 




Lo Mask ji2 


Table 








|2 1 5 


, . ,B|[, , , ] 




Mask ^2 










|2 1 6 


, , X^ E, ^ 3, 0,5 




Original Wor 


. 








|2 1 7 


1 1 1 M, q 6, 6,3 




X 


1 @ 6 










|2 1 8 


1 , X^ H| ^ 3, 0,7 




L.H. Portion 










|2 1 9 


, , , u, q 8, 3,3 














,3 1 


, , , C, Q 3, 3,1 














|3 1 1 


[,,,,,,,] 




X 


Print Oper 


s.tion Char, in Tracing 


FORM LP- 10 
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JOB NO. 


PROGRAM NO. PROGRAM PREPARED BY PROGRAM CHECKED BY 

Al-121 R.A. Koenig POOL Review 


DATE ^^H 

5-7-59 ^ 


PROBLEM: 

Floating Point Interpreter (With Trace) 


TRACK 

08 


PROGRAM INPUT COOES 


0. 



1- 

VI 


LOCATION 


INSTRUCTION 


Q. 


K 

in 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 




/ 
















/ 


X 








q 8,3 ,2 


1 , ,U| :^i,i,7 












1 |3 1 3 


, , X,B| 6 3iO|5 






Original Word 






1 |3 1 4 


, , ,E|[ , , , ] 






Save R.H. Portion 






1 |3 1 5 


1 1 X, A ^ 3,0,7 




X 




L.H. Portion J| 






1 |3 1 6 


1 , ,U| q 6,3, U 




— > 


Return to Binarize 






1 |3 |7 


1 1 X,C^ 3,0,2 




} 








1 |3 1 B 


1 1 ^ P| 9 °i°i^ 




V 


Read Address 






1 |3 |9 


1 1 ^I| Q 0|0|il 




XI J 








1 1^ |0 


1 1 1 E, q 8,6,2 




w3Jw3J 


Trim to BCD 






1 |4 1 ' 


1 1 X, A, ^ 3,2,7 




Ni 








1 l< 1 2 


, , ,U| q 7,0,3 












1 1^,3 


1 1 X, z q 0,0,7 




K 


Mask 


(0757) • 






1 |4 1 4 


J ^ lB^ ^ Oj 0^0 




Here on Z 


or N : Stop Order 






1 |4 1 5 


1 1 iU| q 3,3,6 


--" 


— 










1 i4 1 6 


, , ,S| [ , , i 


q from P 


shifts 






1 |4 1 7 


, , ,u q 8,u,9 




X 










1 |4 1 8 


, , ,Z| ^ 0,2,1; 




Lo q table 


(0905)# 






1 |4 1 9 


, , X, H| ^ 3, 2,1 




q @29 


* 








1 |5 1 


, , X, B| 6 3, 2,2 




« 
N 




> Standardization 








1 1 , N q 8, ^,9 




X 


1 @30 




Loop 






.5 ,2 


, , ,U| q 8,5,3 














1 1 5 1 3 


, , ,t|[, , , ] 




Exit from 


Std. 










1 1 ^ c^ 3, 2,2 




N* 












, , ,S| q 7,3,1; 




y^ 


1 @ 29 










1 |S 1 6 


1 , X, A| ^ 3, 2,1 




q @ 29 










1 |5 i 7 


, , , U| q 8, li,9 






J 




,,0,0 p ,0 p ,05 


1 


1 |S 1 8 


5, G|3 |W 8 ,G q ,8 


--- 


G 


roup - Exit 


(0936) 






1 |5 , 9 


,,,,:, ,2 


X 


1 @ 30 


(0851,1009) ^ 






1 16,0 


ill,.; 2 




1 @ 30 


io62k)W 






1 |6 , 1 


5, G.3 ,¥ ^3 G Q 6 


Group - Exit 


-1 @30 

(081;0) 






1 ,6 1 2 


, ,W ,3 , J W 3 J 


:-: 


ask 






, |6 , 3 


, . . ^' '^ 9^ 3 5 




(ZlOlii) 


Lo 10^ Table 


FORM LP-U 
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JOB NO. 


PROGRAM NO PROGRAM PREPARED BY 

Al-121 R.A. Koenig 


PROGRAM CHECKED BY; 

POOL Review 


DATE 

5-7-59 


PROBLEM; 

Floating Point Interpreter (With Trace) 


TRACK 

09 

___. ■ ■ ■= 


PROGRAM INPUT COOES 


(L 
(A 


LOCATION 


INSTRUCTION 


0. 

in 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


1 


/ 
















/ 


X 








0|9 |0 |0 


1 ,X,A|6,3,1;3 






P Ctr. 






1 |0 1 1 


1 1 ,Y 0, 7 ,3 |7 






Set up P divide 






1 |C 1 2 


, , ,A 1 0,7,3 ;l 




xzooio 








1 |0 1 3 


1 1 iY , 0,8,li (5 




^ 




Set up P adj. of q 






1 |0 1 4 


1 ,X,B 6,3|)4,7 






R Ctr. 






1 |0 |5 


1 1 |A 1 0|8|i; 3 




Lo of q Tab 


Le (Z1021;) 






1 |0 |6 


1 1 |Y|0, 7,U^ 






Set up R adj. of q 






1 i" 1 7 


1 1 lU 1 0|9|0 (3 




K 










1 |0 1 < 


1 1 iS I 0, 7,3 p 




10 @ 29 








1 |0 1 3 


1 1 J|0, 7,3^ 






Set up R divide 








1 1 ,U| 0|7i3 ^ 






Here Exit from Input 








1 , X|P| 1| 6,6 ^L 




X 


c.r. 










1 1 iU I 0, 9,6 ,2 




— ^ To delay 


and Exit 








1 1 ^1^ 1 6| 3,6 ^ 




N2 










1 1 iU I 0, 9,1 ,8 








, ,0 ,0,0 0,0 ,0 ,3 


I 




U,0 ,0 ,0 .0 p |0 ,0 




y 


1 @ 1 


(0736) 






1 i1 1 6 


8,3 ,2 ,0 p ,0 ,0 




-3996 @ 12 


(06Uii) 






1 |1 1 7 


8,0 ^ ,3 !8 13 ,0 ,0 




-16,677,216 


@2k (0652) 






1 |1 1 8 


1 1 ,E 0, 6,6,1 




WJOOO 








1 |1 1 9 


1 1 , M 0, 6, 6 ,2 




X 


-63M @0 








1 |2 1 


1 1 X, A I 6, 3 1 6 ,3 




N, 








1 |2 1 1 


1 1 ,U| Q 9,5 ,0 












1 |2 |2 


1 1 1 1 1 1 1 












1 |2 1 3 


, , ,H|' q 0,1;,2 




X 


F.P. Ace. 


Here complete Add 






1 |2 1 4 


, , |B| q o,li,i 




\ 








1 |2 1 5 


, , 1^1 q 3,6,1 




f 


A Exp. Ace by 1 






1 |2 1 6 


, , i K 1 q 0, U ,1 




J 








1 |2 1 7 


1 1 ,U| 9 2,1,3 




E 


> 


To Standarize 






1 |2 1 8 


, , , A 1 q ^ 5 




1 @ 30 


"1 Here N 






1 |2 1 9 


. , ,T| q i,U,3 




O.K. to Std. 


Neg in 






1 |3 1 


, , ,^| qo,ia 


— 


Set Ace =^ 


& iJext Inst.) Std. 






1 |3 1 1 




X 






FORM LP- 10 
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JOB NO. 


PROGRAM NO. PROGRAM PREPARED BY 

Al-121 R.A. Koenig 


IPROGRAM CHECKED BY 

POOL Review 


5-7-59 ^' 


PROBLEM: 

Floating Point Interpreter (With Trace) 


09 

'1 


PROGRAM INPUT CODES 


0. 


1- 


LOCATION 


INSTRUCTION q 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS [^ 


1 


/ 














/ 


X 




_ 








^9 ,3 ,2 


, , ,A| q5,5,li ' 


1 @ 30 










|3 |3 


, , ,U|[ , , , ]J 


Bin. Exit w/ Dec. Ft. 








|3 |4 


, , x,z| qo,2,U ' 


2k ©29 




(00U8) 








|3 |5 


, , ,Z| 1^ 0,1,14 ' 


X 


T,o 10^ Tatle (0863^ 








|3 |6 


, , ,A| q 8,5,8 ' 




Group - Exit 








,3 ,7 


, , ,A| q 6,0,2 / 




Exit 








|3 |8 


, , ,R| q 8,5,3 ' 




Set up Po3 Exit 








|3 |9 


, , ,U| q 7,0,8 1 


■"a"""_.„ 










,4 |0 


, , ,U| q 9,5,3 _' 


— > 


Store Word 








|4 1 < 


1 1 X,C| ^ 3j2_^ ' 












1* |2 


, , X,G| 6 3, 2,1 ' 




Here N = after ^_^ 








l< |3 


, , X^C| ^ 3,2,2 ' 


X 




all Binirization & ^ 








|4 1 4 


A X LU4 <19j^Lk.,- 




, 


Assembly- 








|4 1 5 


1 1 |R| 9 9,6^0 




Here lOOOO : Fill 








,4 1 6 


, , , u, q_8,3,7 


Read Add 


Sequentially 








|4 1 7 


1 1 1 U| q 9,1;, 8 


'X 












,4 1 8 


, , , B| n, 0,3,6 


•\ 


• 








,4 1 9 


1 , , A| Q 6, 2,8 


' 1 @ 29 


A Address for Seq. Fii:. 








,5 ,0 


1 , , H 3, 3,6 


/ 










,5 1 1 


, , ^ C| ^ 3,3,0 


3" 


Dump 










i5 |2 


, , , U, I, 0, 0,0 


/ 


Read 1^^ Word 








1 |5 1 3 


, , ^B| ^ 3,2,1 


' Exp @ 29 










1 |5 1 4 


, , 1 H, q 0, U,i 


' Exp Ace. 










1 i5 1 5 


, , ^B| ^3,2,2 


lK' 


Fr. Std 










1 |5 1 6 


, , ,H Q 0,14,2 


1 F.P.ACC. 










1 |5 1 7 


^ _x_ L?4 ^ Q| 3|6 


/ 


Address 








1 |5 1 8 


, , .R| Q 1,3,7 


■ , ] 


, Store N 








1 |5 1 9 


1 , , u, q 1, 3,8 


■X 


) 




,, q 0,0 0, 0,0 /; 


1 




1 |6 1 


, , ,U|[, , . ] 


1 
1 


Exit on Sin 


j:le or Seq. Fill ffH 








, |6 , 1 


, , ^ 1 , koo^. 












1 |6 1 2 


, , , , ,2 


< 1 @ 30 


Input £ 


(0726) 








, |6 , 3 


, , ,U|[, , J 


'Y 


Exit from 


section 


FORM LP- 12 
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PROGRAM NO. 
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PROGRAM PREPARED BY 

R.A. Koenig 


PROGRAM CHECKED BY: 
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DATE 

5-7-59 


PROBLEM r 

Floating Point Interpreter (With Trace) 


TRACK 

10 


PROGRAM INPUT CODES 


a. 

U) 


LOCATION 


INSTRUCTION 


Q. 


1- 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 


1 


/ 














' 


/ 


X 








l|O|0 |0 


1 |X|C 1 6,3 |U 3 


. 










1 |0 1 1 


1 ,^,P OiO|l ^ 












1 |0 1 2 


1 i^ii 1 0|°|i 7 












1 |0 |3 


1 1 |N 1 0|0|1 p 




P 










1 |0 1 4 


1 1 |T 1 0|8|1 p 












1 |0 |5 


1 . ,S 1 1,0 3 ^ 












1 |0 |( 


1 1 |T 1 0|9|3 P 












1 |0 1 7 


1 1 iS 1 0,6,3 |6 




X 










1 |0 lO 


1 1 iT , 0, 9,3 ,7 












1 1 1 1 

1 |0 1 3 


1 1 .s 1 0, 8,5 ^ 














. 1 iT 1 0, 9il P- 














1 , iS 1 0, 8,6 ,1 




x 












1 1 1 T 1 0, 9 1 3 ,6 














1 1 1 U 1 0, 8 , 3 ,7 








., 0,0,0 0,0 ,2 ,1 


1 




7iW 1 ¥|¥ ¥, W,¥ ,Q 




10^ @ 


^ 








1 R 


5,0 1 0,0,0 1 0,0 ,0 




^ " 


10^ @ U 










1 |1 1 6 


6|U 1 0,0 1 0,0 ,0 




102 @ 7 










1 ii \^ 


7|K 1 0,0.0 1 0,0 ,0 




103 @ 10 










.... 1 .1 1 

1 |1 1 8 


liiQ 1 2, 0,0 , 0,0 ,0 




10^ @ m 




> 10^ Table 






1 |1 1 9 


6,-1 , F|8 1 0,0 ,0 




^ "" 


10^ @ 17 










1 |2 1 


7iF 1 1, 2 1 0,0,0 




10^ @ 20 












U, J 1 U| G|h , 0,0,0 




107 @ 21; 












5|W, 5| Q|i 1 0|0,o 




10^ @ 27 












7,7, 3,5,9 1 a,0,0 




X 


lo9 @ 30 


J 













S 29 


\ 










, 1 1 1 1 |l|° 




U @ 29 










1 |2 1 6 


1 1 1 1 1 il,'^ 




7 @ 29 










1 |2 1 7 


1,1,1 ,2,8 




)<(| 10 @ 29 




q Table 






t |2 1 8 


, , , 1 , ,3,8 




lU @ 29 










1 |2 1 9 


, , . 1 , ^.^ 




17 e 29 










1 |3 i 


5,0 




20 a 29 










1 |3 1 ' 


6,0 




X 


2U '.^ 29 






FORM LP- 10 
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CARRIACE RETL 


RN 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY: F 

R A. Koenig 


ROG 

P 


RAM CHECKED BY 

OOL Review 


5-7-59 w 


PROBLEMr 

Floating Point Interpreter (With Trace) 




TRACK 

10 


PROGRAM INPUT CODES 


0. 

in 


LOCATION 


INSTRUCTION 


Q. 


H 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 




/ 
















/ 


X 












IjO ,5 , 2 


1 1 1 1 1 1 6 |J 


/ 


27 @ 29 


y Balance of q Table 








|3 1 3 


,7,8 


/ 

/ 


30 @ 29 
Delay & 1 @ 3C 










|3 1 4 


'. , , -|. -L 

,,,,,, |2 


(1005) 








|3 1 5 


1 1 1 U| q 0,0,0 


/ 


X 


--^ 


Interpret next Inst.j^ 


, 1 0, 0,0 . 0,0,1 , 


I 




,3 |6 


[ , , , 1 , , , ] 


1 
1 

1 


Ac 


Idress 


(09U8, 0950, 0921) 








|3 1 7 


7|9|Q , 7,9 , Q|0,0 


•\ 










,3 |8 


ill 9jQ^l|8^ ^1 OiO 


■ 


Ma3k# 1 








,3 1 9 


7|9|Q , 0|0 1 0,0,0 


1 


a_ 










,4 , 


7, 8,0 , 1 0,0,0 


1 


J 


Decimal Point 






1 


|4 , 1 


1 1 , 1 , . ,0 


1 


•V 


Masks 








,4 1 2 


, , , 1 , ,7,8 


1 












|4 , 3 


, , , |1, Q,7,8 


1 
1 


E 




Mask #2 W 








|4 1 4 


x_^ 1 7^9, Qj7A 












|4 1 5 


,1,Q , 7 9 , Q,7,8 


1 


i 










,4 1 6 


1 , |R| q 1,1,9 


1 


i 


Bring Sub. (Trace) 








|4 1 7 


, , ,U| P 0,3,2 


1 


E 


) 










,4 , 8 


, , ,U| :i, 0,5,6 


1 




V 








,4 , 9 


, , x;C| ^ 3,0,7 


1 


• 


Here N Neg. 








,5 1 


, , ^S| ^ 3,2,2 


1 




Complement N* 








,5 1 1 


, , ^H| ^3,2,2 


1 


E ' 


4 










,5 , 2 


, , ,U 9 9,5,3 


1 












1 |5 1 3 


, , ,R| Q 5, 2,U 


1 


' 1 


Here POOOO Print Ace. 








|5 1 4 


, , ,U| Q5,5,5 


1 


^ 










|5 1 5 


, , ,U| 9 0,1,3 


1 


X 


-^ 


To next commajid 








i5 1 6 


, , ^B ^3,3,1 


1 


Exp 








J 


|5 1 7 


, , ,U| ; 1,5,8 


1 












|5 1 8 


,,,1:11 


1 
1 
1 
1 
1 
1 












|5 1 9 


, . ^B| 6 3,3,1 


Y 


...Eb 


Complete Bring _ 








|6 1 


, 1 ^ H, Q C^l;,l 




Exp. Ace. 





V 








|6 1 1 


: , I,B^6 3 3 ^ 


^-H 










,6 1 2 


L_J^ U^ 3, 2 1 










|6 1 3 


, , , B Q 0, 


\ / 




Enter Tracing Mode Here 


FORM l.P-12 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY: PROGRAM CHECKED BY: 

R.A. Koenig POOL Review 


DATE 

5-7-59 


PROBLEM: 

Floating Point Interpreter (With Trace) 


TRACK 

11 


PROGRAM INPUT CODES 


0. 

(- 
in 


LOCATION 


INSTRUCTION 


0. 


h 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 


1 


1 
















1 


X 








llliO ,0 


1 1 |R 1 1 1 1 12 3 




j 


Print Loc of Instr. 






1 |0 1 1 


1 1 ,u i|i |2 ;l 




) 








1 |0 |2 


1 1 tU 1 0,6,3 ,7 












1 |0 1 3 


, |X|B 6,3 ,3 p 




X 


Instr. to 


be Interpreted 






1 |0 |4 


. 1 iM 1 0,0,2 |S 




1 ® lU 








1 |0 |5 


1 1 lE |1|1,3 K 




XZ0015 


Save order bits @ 29 






1 |0 |6 


1 1 |S 1 1,1,3 (S 




5 @ 29 








1 |0 1 7 


1 1 J 1 °i°i° P 




% 


-^ 


^,B,T,R,I Continue 






1 |0 1 8 


1 1 ,S , 1,1,3 p 




1 @ 29 










1 1 .T 1 0,6,5 ]x 




-* D Erint C 
Contmu 


intents of Memory & 






1 1 ' 1 '^ 


1 1 iS 1 0,5,5 3 




1 @ 29 










, , ,T 1 0,0,0 ,8 




X 


— ♦ N — ► 


Continue 








1 1 ,S|0, 7,3A 


1 


1 @ 29 










1 , |T 1 0, 6,5 ^ 




— *M > 


Print Contents of Mem. 








1 1 |S , 1, 1,3 |8 




6 @ 29 










1 1 1 T 1 0, 1 ,8 




X "" ^ 


> 


P,E,U,T,H,C, Continue 








1 , |U| 0, 6,5 Ix 






iere A or S Command 








1 1 X,B I 6, 3,3 ,0 




Instruction 










1 1 1 R I 1, 1 , 2 ,3 




]• Print 


A.dd. portion of Instr. 








1 1 |U 1, 1,2 ,1 




X 


J 










1 1 ,U| 1, 1,0,3 




— > Deterit 


ine type of Order 








, , ,R| 1,1,3 ,9 




"X 


Print Address 








1 , |U| 1, 1,2 ,1| 














, , ,u,[, , , ] 




X 




Exit Address Print 








1 1 X|H| ^ 3,5,3 






Address 








1 1 |M| q 5,3,0 




1 @ 6 








1 |2 1 6 


1 1 |E| Q 2,3,2 




(XZOO63) 


Save sector bits @ 29 






1 |2 1 7 


, , ,R| ii 1,5,7 




E 


] 


Print Track Portion 






1 |2 1 8 


, , ,u i,i,U,o 












1 |2 1 9 


. , ,3 q 2,3,2 




(XZ0063) 








1 |3 1 


1 1 ^ z q 0, 0.1 




Delay & 1 © 2$ 


(1108) 






1 |3 1 1 


1 ,X £ , 6 3i 5.3 




X. 


Address 




FORM LP-10 
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X 
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RN 
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JOB NO. 


PROGRAM NO. 

Al-121 


PROGRAM PREPARED BY F 

R.A. Koenig 


>ROGRAM CHECKED BY 

POOL Review 


5_7_59 m^ 


PROBLEM: 

Floating Point Interpreter (With Trace) 


11 


PROGRAM INPUT COOES 


0. 
(A 


LOCATION 


INSTRUCTION 


0. 

H 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


1 


/ 
















/ 


X 








1|1 ,3 1 2 


, , , V,i5 7 




► 


Print Sector Characters 








|3 1 3 


, , , u i,i,U 9 




i 












|3 1 4 


, , ^ Z| 0,0,1 ^ 




Delay & l5 ® 2: 


(1105) 








|3 1 5 


, , 3fP| 0,3,0 p 




X 


Space 


# 








,3 |6 


, , ]? Z| 0,0,0^ 




Delay & 5 @ 2: 


) (1106) 








|3 1 7 


, , ^P| 0,3,0 ^ 




De 


Space 










|3 , 8 


1 1 ^ 2 1 ,0 ^ 


Lay & 6 @2: 


) (111!;) 








|3 1 9 


, , , U|l,l,2 ^ 




^T 










|4 ,0 


1 1 ^ H| 6,3 |1 ? 




T or S @ 29 










|4 1 1 


, , , D| 0,2,1;? 




10 @ 29 










,4 , 2 


1 , , E| 0,6,0 p 




XZ0700 


Save 3 sector bits 








,4 , 3 


, ,x,H p:?5, 8, 




X 


S/10@ 23 


•' 








|4 1 4 


, , , N| 0,0,3 P 




U @ 31 










|4 1 5 


1 , 1 A| 0,6,0 3 




XP0205 










,4 1 6 


, , , 0,1,1,1; 7 














|4 1 7 


1 
1- 1 1 1 1 1 1 1 -> 




X 




Print 1^^ Character 








i4 1 8 


, , , B|0,2,U ? 




10 @ 6 


m 




1 




|4 , 9 


, , ^M|6,3,5 ? 




S/lO @ 23 










i5 1 


, , ^A| 6,3,1 ? 




T or S @ 29 










|5 1 1 


1 1 1 M| 0,5 ,2 3 




X' 


-1 @ 










|5 1 2 


, , , N|0,2,6p 




U @ 25 




1 1 1 1 i 1 1 






1 |5 1 3 


, , , A 0,6,0 3 




XP0205 










|5 1 4 


, , , C| 1,1,5 ^ 














|5 1 5 


, , , u 1,1^ ^ 




X 












i5 1 6 


L 1 1 1 1 1 1 1 ] 






Print 2^^*^ Character 








|5 1 7 


, , , U| [ , , , ] 






Exit 2 digit Print 








|5 1 8 


, , , S|0,5 ,1; 5 




256 @ 29 


■> 










|5 1 9 


, , ]f C| 6,3.1 ^ 




K 














|6 1 


t ^---^ 

1 , :)f B^6,3j3 3 


-- 


a ____ 




> Print Contents of^P 








,6 1 t 


, , R , 5 2 U 


Memory Location 








,6 1 2 


, , , ^J, 0,5 2 1 


















,6,3 , , , u, 0,0,0 3 


X 




ixecute Operation 


FORM LP-12 
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X 


CARRIAGE RETL 


JR 


N 


■c.»i Mm. JOb-t t » 



